MEASURE A DYNAMIC PARAMETER 
OF THE BATTERY 






OBTAIN A DISCHARGE CURRENT 
OF THE BATTERY 






MEASURE A VOLTAGE OF THE 
BATTERY 






OBTAIN A TEMPERATURE OF THE 
BATTERY 







PREDICT A REMAINING RUN TIME 
OF THE BATTERY AS A FUNCTION 
OF THE MEASURED BATTERY 
DYNAMIC PARAMETER, THE 
DISCHARGE CURRENT, THE 
MEASURED BATTERY VOLTAGE, 
THE BATTERY TEMPERATURE, A 
FULL CHARGE BATTERY DYNAMIC 
PARAMETER AND AN ESTIMATED 
CAPACITY OF THE BATTERY 



START 




loo 







'DEFINE TEMPERATURE COMPENSATION FUNCTIONS FOR CONDUCTANCE AND CAPACITY 
FNCOMPG = f1(TEMP) 
FNCOMPCAP = f2(TEMP) 

'INITIALIZE ALL VARIABLES 




f 



INPUT 
BATTERY Ah (CAPO) 
TYPICAL CONDUCTANCE (GO) 
TYPICAL CURRENT FOR DISCHARGE (Aave) 




2*4 



To Data Input 



fjG 3-1 



W DATA INPUT 




'GET INPUT DATA 
INPUT T, A, V.TEMP.G 



Gcomp = G * FNCOMPG(TEMP) 
A1 =A 

IF TSTART = 0 THEN TSTART = 
IFT1 = 0 THEN T1 =T 



•COMPENSATE CONDUCTANCE 
'SAVE OLD VALUE 
'SAVE INITIAL TIME 
'FIRST ACCESS 





33 >x 

HOOKUP 



ESTIMATE THE AMOUNT OF DISCHARGE FROM THE BATTERY VOLTAGE AND f- 3 3 

BATTERY DISCHARGE VERSUS VOLTAGE CHARACTERISTICS 



HOOKUP = -1 



! NOW HOOKED UP 



116 



RETURN 



CALCULATIONS 



2JfO 



1 


f 


'ACCUMULATED DISCHARGE 
D = D+A*(T-T1)/3600 
IF D > 0 THEN D = 0 




r 



'CALCULATE NOMINAL COMPENSATED CONDUCTANCE 
GO = (999 * GO + Gcomp) / 1 000 



■3^ 

DISCHARGING? >4= 





'ESTIMATE WORKING CAPACITY AT AVERAGE CURRENT AND TEMPERATURE 
CAP = CAPO * FNCOMPCAP(TEMP) / Aave A n-1 



3«- 



'ESTIMATE REMAINING TIME AT OVERALL AVERAGE CURRENT AND TEMPERATURE 

Yes TR = ( CAP + D ) I Aave 

IF TR < 0 THEN TR = 0 



'ESTIMATE SOC BASED ON WORKING CAPACITY AND 
ACCUMULATED DISCHARGE 

SOC = (CAP + D)/ CAP* 100 
IF SOC > 1 00 THEN SOC = 100 
IF SOC < 0 THEN SOC = 0 



'SAVE OLD TIME VALUE 
T1 =T 



J 

^ RETURN ^y ^- ■ 5 S & 



IDLE MODE 




160 



362 




Yes- 



3*4 



IDLE = -1 


'SET IDLE MODE 


DISCHARGE = 0 


'NOT DISCHARGING 


CHARGE = 0 


'NOT CHARGING 


T0 = T 


'SET INITIAL TIME 



DISCHARGE MODE 




3 70 

DISCHARGE = 0? ^> Yes • 




No 



Yes 



■DONT AVERAGE LOW VALUES OF CURRENT 
Aave = (99 * Aave - A) / 1 00 

'ESTIMATE WORKING CAPACITY AT 
TEMPERATURE AND CURRENT 
CAP = CAP1 * FNCOMPCAP(TEMP) / ((-A) A n-1 



37-2- 



DISCHARGE = -1 


'SET DISCHARGING MODE 


CHARGE = 0 


'NOT CHARGING 


IDLE = 0 


'NOT IN IDLE 


DO = D 


'INITIAL DISCHARGE VALUE IN ROUTINE 


T0 = T 


'INITIAL TIME IN ROUTINE 


CAP1 = CAPO 


'HOLDING VALUE 


SOC1 = SOC 


'LAST VALUE OF SOC 


N = 1 


'SET COUNTER 




Z76 



N = N + 1 
IF N = 3 THEN N = 0 



C 



GO TO DISPLAY W 



> 




i 








TR 


= 0 


. TRCALC = 0 


CAP1 = 


= CAP0 


SOC=0 


i 





No 



Yes 





TO DISCHARGE 
CALCULATIONS 



'RECALCULATE SOC USING DISCHARGE VALUES 
SOC = (CAP + D) / CAP * 1 00 
IF SOC > 100 THEN SOC = 100 
IF SOC <0 THEN SOC = 0 



FIG,. 3-1 



DISCHARGE 
CALCULATIONS 




•CALCULATE TIME REMAINING USING BATTERY 
PARAMETERS 
. TRCALC = k * CAP1/ (-A) A n * Gcomp / GO * (V - 10.5) A 2' 



<^ SOC1=0? 




Yes-* 


SOC1=1 


No 
T 


S~ 






F1 = SOC/SOC1 
IF F1>1 THEN F1 = 
F2= 1-F1 


1 








< 







' CAP+D < 0 AND TRCALC > 0?"> — Yes-> 




CAP = -(TRCALC *A+D) 
CAP1 = CAPO 



TIME REMAINING ESTIMATE BASED ON OLD CAPACITY + NEW 
CALCULATIONS AND SOC WEIGHTING 
TR = -F1 * (CAP + D) / A + F2 ** TRCALC 




~Jfl0 

TRCALC = 0 OR TR<0?^> Yes- 



TR=0 



No 



'ESTIMATE WORKING CAPACITY AT PRESENT CURRENT 
CAP = -(TR * A + D) 

'RECALCULATE OVERALL CAPACITY 
CAPO = (-D * Aave A n-1 + (CAP + D) * ((-A) A n-1)) / FNCOMPCAP(TEMP) 



C 



RETURN 




CHARGE = -1 


'SET CHARGING MODE 


DISCHARGE = 0 


'NOT DISCHARGING 


IDLE = 0 


'NOT IDLE 


TO=T 


'SET ROUTINE BEGINNING TIME 



FIG,. 




PRINT "IDLE" 



PRINT USING 'VOLTS ###.## V"; V 
PRINT USING "AMPS ####.# A"; A 
PRINT USING "TEMP ###### F"; TEMP 
PRINT USING "DISCHARGE ####.# Ah"; D 
PRINT USING "SOC ####.# %"; SOC 



•J/22 



'SYSTEM VOLTAGE 
'CURRENT 

TEMPERATURE DEG F 
•DISCHARGE AH 
•SOC 



r-Yes- 




PRINT USING "###.## HR AT ###.# A"; TR; • 
TIME REMAINING AT REAL CURRENT 



PRINT USING "###.## HR AT ###.# A"; TR; AAVE 
TIME REMAINING AT AVERAGE CURRENT 



M GO TO INPUT DATA W- 



